home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
raversfilters
/
triangle button
< prev
next >
Wrap
Text File
|
1999-06-15
|
1KB
|
33 lines
Category: Harry's Button Tools
Title: Triangle Button
Copyright: (c) 1998 by harry@visca.com
Author: Harry the Raver
Filename: Triabutt.8bf
R:put(val(0,-128,128),0),put(val(1,1,M),1),put(x+y*X/Y/2<X/2+get(0)?255:x-y*X/Y/2>X/2-get(0)?255:x-y*X/Y/2<-X/2+get(0)?255:x+y*X/Y/2>3*X/2-3*X/Y-get(0)?255:0,2),get(2)>0?ctl(z+5):x+y*X/Y/2<X/2+get(0)+get(1)&&x<X/2&&c2d(x,Y-y)>85?c+val(2,-128,128):x-y*X/Y/2>X/2-get(0)-get(1)&&c2d(X-x,Y-y)>85?c+val(3,-128,128):x-y*X/Y/2<-X/2+get(0)+ctl(1)&&x<X/2?c+val(4,-128,128):x+y*X/Y/3>3*X/2-3*X/Y-get(0)-get(1)?0:y>Y-get(1)?c+val(4,-128,128):c
G:get(2)>0?ctl(z+5):x+y*X/Y/2<X/2+get(0)+get(1)&&x<X/2&&c2d(x,Y-y)>85?c+val(2,-128,128):x-y*X/Y/2>X/2-get(0)-get(1)&&c2d(X-x,Y-y)>85?c+val(3,-128,128):x-y*X/Y/2<-X/2+get(0)+ctl(1)&&x<X/2?c+val(4,-128,128):x+y*X/Y/3>3*X/2-3*X/Y-get(0)-get(1)?0:y>Y-get(1)?c+val(4,-128,128):c
B:get(2)>0?ctl(z+5):x+y*X/Y/2<X/2+get(0)+get(1)&&x<X/2&&c2d(x,Y-y)>85?c+val(2,-128,128):x-y*X/Y/2>X/2-get(0)-get(1)&&c2d(X-x,Y-y)>85?c+val(3,-128,128):x-y*X/Y/2<-X/2+get(0)+ctl(1)&&x<X/2?c+val(4,-128,128):x+y*X/Y/3>3*X/2-3*X/Y-get(0)-get(1)?0:y>Y-get(1)?c+val(4,-128,128):c
A:a
ctl[0]: Zoom
ctl[1]: Bevel Size
ctl[2]: Left
ctl[3]: Right
ctl[4]: Bottom
ctl[5]: Back Red
ctl[6]: Back Green
ctl[7]: Back Blue
val[0]: 129
val[1]: 21
val[2]: 240
val[3]: 26
val[4]: 179
val[5]: 128
val[6]: 128
val[7]: 128